home *** CD-ROM | disk | FTP | other *** search
/ Hackers Matrix / Hacker's Matrix (nCite Software) (2003).iso / Data / hack0166.exe / RawPortTCP.exe / 0 / RCDATA / TMAIN / TMAIN.txt
Text File  |  1999-11-13  |  6KB  |  274 lines

  1. object Main: TMain
  2.   Left = 510
  3.   Top = 116
  4.   Width = 608
  5.   Height = 504
  6.   Caption = 'Main'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Menu = MainMenu1
  14.   OldCreateOrder = False
  15.   Position = poDesktopCenter
  16.   OnShow = FormShow
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object Splitter1: TSplitter
  20.     Left = 0
  21.     Top = 89
  22.     Width = 600
  23.     Height = 3
  24.     Cursor = crVSplit
  25.     Align = alTop
  26.   end
  27.   object Splitter2: TSplitter
  28.     Left = 0
  29.     Top = 317
  30.     Width = 600
  31.     Height = 3
  32.     Cursor = crVSplit
  33.     Align = alBottom
  34.   end
  35.   object Panel1: TPanel
  36.     Left = 0
  37.     Top = 0
  38.     Width = 600
  39.     Height = 89
  40.     Align = alTop
  41.     TabOrder = 0
  42.     object Input: TMemo
  43.       Left = 1
  44.       Top = 1
  45.       Width = 440
  46.       Height = 87
  47.       Align = alLeft
  48.       Anchors = [akLeft, akTop, akRight]
  49.       Font.Charset = ANSI_CHARSET
  50.       Font.Color = clWindowText
  51.       Font.Height = -11
  52.       Font.Name = 'Courier New'
  53.       Font.Style = []
  54.       ParentFont = False
  55.       ScrollBars = ssBoth
  56.       TabOrder = 0
  57.       WordWrap = False
  58.       OnKeyPress = InputKeyPress
  59.     end
  60.     object SendBtn: TButton
  61.       Left = 448
  62.       Top = 4
  63.       Width = 75
  64.       Height = 21
  65.       Anchors = [akTop, akRight]
  66.       Caption = 'Send'
  67.       TabOrder = 1
  68.       OnClick = SendBtnClick
  69.     end
  70.     object SendOnReturn: TCheckBox
  71.       Left = 448
  72.       Top = 28
  73.       Width = 81
  74.       Height = 17
  75.       Anchors = [akTop, akRight]
  76.       Caption = 'Send On CR'
  77.       Checked = True
  78.       State = cbChecked
  79.       TabOrder = 2
  80.     end
  81.     object Connect: TButton
  82.       Left = 448
  83.       Top = 64
  84.       Width = 145
  85.       Height = 21
  86.       Anchors = [akTop, akRight]
  87.       Caption = 'Connect'
  88.       TabOrder = 3
  89.       OnClick = ConnectClick
  90.     end
  91.     object SettingsBtn: TButton
  92.       Left = 536
  93.       Top = 4
  94.       Width = 59
  95.       Height = 21
  96.       Anchors = [akTop, akRight]
  97.       Caption = 'Settings'
  98.       TabOrder = 4
  99.       OnClick = SettingsBtnClick
  100.     end
  101.     object StatusBtn: TButton
  102.       Left = 536
  103.       Top = 24
  104.       Width = 59
  105.       Height = 21
  106.       Anchors = [akTop, akRight]
  107.       Caption = 'Status'
  108.       TabOrder = 5
  109.       OnClick = StatusBtnClick
  110.     end
  111.     object SendCR: TCheckBox
  112.       Left = 448
  113.       Top = 44
  114.       Width = 69
  115.       Height = 17
  116.       Anchors = [akTop, akRight]
  117.       Caption = 'Send CR'
  118.       Checked = True
  119.       State = cbChecked
  120.       TabOrder = 6
  121.     end
  122.   end
  123.   object Ascii: TMemo
  124.     Left = 0
  125.     Top = 92
  126.     Width = 600
  127.     Height = 225
  128.     Align = alClient
  129.     Font.Charset = ANSI_CHARSET
  130.     Font.Color = clWindowText
  131.     Font.Height = -11
  132.     Font.Name = 'Courier New'
  133.     Font.Style = []
  134.     Lines.Strings = (
  135.       'RawPort TCP'
  136.       'Release 1.0a   (Maintenance release)'
  137.       ''
  138.       
  139.         'Read license_free.txt to check you are eligible for the freeware' +
  140.         ' license, if not '
  141.       
  142.         'then you have 14 days to legally evaluate this product within yo' +
  143.         'ur organisation.'
  144.       ''
  145.       'This software is fully functioning.'
  146.       ''
  147.       
  148.         'Many thanks to those of you that give feedback, support, ideas a' +
  149.         'nd words'
  150.       
  151.         'of encouragement!  Help keep freeware alive and give authors som' +
  152.         'ething back.'
  153.       ''
  154.       'Ascii')
  155.     ParentFont = False
  156.     ScrollBars = ssBoth
  157.     TabOrder = 1
  158.   end
  159.   object Binary: TMemo
  160.     Left = 0
  161.     Top = 320
  162.     Width = 600
  163.     Height = 119
  164.     Align = alBottom
  165.     Font.Charset = ANSI_CHARSET
  166.     Font.Color = clWindowText
  167.     Font.Height = -11
  168.     Font.Name = 'Courier New'
  169.     Font.Style = []
  170.     Lines.Strings = (
  171.       'Binary')
  172.     ParentFont = False
  173.     ScrollBars = ssBoth
  174.     TabOrder = 2
  175.   end
  176.   object SB: TdfsStatusBar
  177.     Left = 0
  178.     Top = 439
  179.     Width = 600
  180.     Height = 19
  181.     Panels = <
  182.       item
  183.         Alignment = taCenter
  184.         PanelType = sptTime
  185.         Text = '03:04:29'
  186.         Enabled = True
  187.         Width = 50
  188.       end
  189.       item
  190.         Alignment = taCenter
  191.         Text = 'Socket State'
  192.         Enabled = True
  193.         Width = 80
  194.       end
  195.       item
  196.         PanelType = sptEllipsisText
  197.         Text = 'LithiumSoft RawPort TCP'
  198.         Enabled = True
  199.         Width = 37
  200.         Hint = '...'
  201.       end>
  202.     SimplePanel = False
  203.   end
  204.   object MainMenu1: TMainMenu
  205.     Left = 80
  206.     Top = 136
  207.     object File: TMenuItem
  208.       Caption = '&File'
  209.       object ClearWindows: TMenuItem
  210.         Caption = '&Clear Windows'
  211.         OnClick = ClearWindowsClick
  212.       end
  213.       object Exit: TMenuItem
  214.         Caption = 'E&xit'
  215.         OnClick = ExitClick
  216.       end
  217.     end
  218.     object Help: TMenuItem
  219.       Caption = '&Help'
  220.       object About: TMenuItem
  221.         Caption = '&About'
  222.         OnClick = AboutClick
  223.       end
  224.     end
  225.   end
  226.   object SrvSock: TWSocket
  227.     LineMode = False
  228.     LineEnd = #13#10
  229.     LineEcho = False
  230.     LineEdit = False
  231.     Proto = 'tcp'
  232.     LocalAddr = '0.0.0.0'
  233.     LocalPort = '0'
  234.     MultiThreaded = False
  235.     OnDataAvailable = SockDataAvailable
  236.     OnSessionClosed = SrvSockSessionClosed
  237.     OnSessionAvailable = SrvSockSessionAvailable
  238.     OnSessionConnected = SockSessionConnected
  239.     OnChangeState = SockChangeState
  240.     OnError = SockError
  241.     FlushTimeout = 60
  242.     SendFlags = wsSendNormal
  243.     LingerOnOff = wsLingerOn
  244.     LingerTimeout = 0
  245.     SocksLevel = '5'
  246.     SocksAuthentication = socksNoAuthentication
  247.     Left = 256
  248.     Top = 204
  249.   end
  250.   object CliSock: TWSocket
  251.     LineMode = False
  252.     LineEnd = #13#10
  253.     LineEcho = False
  254.     LineEdit = False
  255.     Proto = 'tcp'
  256.     LocalAddr = '0.0.0.0'
  257.     LocalPort = '0'
  258.     MultiThreaded = False
  259.     OnDataAvailable = SockDataAvailable
  260.     OnSessionClosed = CliSockSessionClosed
  261.     OnSessionConnected = SockSessionConnected
  262.     OnChangeState = SockChangeState
  263.     OnError = SockError
  264.     FlushTimeout = 60
  265.     SendFlags = wsSendNormal
  266.     LingerOnOff = wsLingerOn
  267.     LingerTimeout = 0
  268.     SocksLevel = '5'
  269.     SocksAuthentication = socksNoAuthentication
  270.     Left = 300
  271.     Top = 204
  272.   end
  273. end
  274.